; Music of Shufflepuck Cafe (1989) (Broderbund Software)
; Ripped by Megachur the 11/11/2006

	write "SHUFFLEC.BIN"

music_date_rip	equ &0bb6
music_adr	equ &5000
first_theme	equ 0
last_theme	equ 0

	read "music_header_v1_0.asm"

	db #4f,#14,#89,#4f
;
.init_music
;
	xor a
	ld (l553a),a
	ld a,#ff
	ld (l5541),a
	ld hl,l5549
	ld (hl),#00
	ld de,l554a
	ld bc,#0128
	ldir
	ld bc,l57c5
	ld a,(l57c6)
	ld (l5672),a
	ld hl,(l57c7)
	add hl,bc
	ld (l5675),hl
	ld hl,(l57c9)
	add hl,bc
	ld (l5677),hl
	ld hl,(l57cb)
	add hl,bc
	ld (l554e),hl
	ld hl,(l57cd)
	add hl,bc
	ld (l5589),hl
	ld hl,(l57cf)
	add hl,bc
	ld (l55c4),hl
	ld hl,l57d1
	ld (l5673),hl
	ld a,#0f
	ld (l567a),a
	ld hl,l5543
	ld de,l5549
	ld bc,#0005
	ldir
	ld hl,l5543
	ld de,l5584
	ld bc,#0005
	ldir
	ld hl,l5543
	ld de,l55bf
	ld bc,#0005
	ldir
	ld c,#38
	ld a,#07
	call l5755
	ld a,#ff
	ld (l553a),a
	ret
;
.play_music
.l507f
;
	ei
	ld a,(l553a)
	or a
	ret z
	xor a
	ld (l553a),a
	ld a,#08
	ld (l553c),a
	cpl
	ld (l553d),a
	ld a,(l567a)
	ld e,a
	ld b,#03
	ld hl,l55de
.l509b
	ld a,(hl)
	ld c,a
	ld a,(l5542)
	or b
	sub #03
	ld a,#00
	jr c,l50ac
	ld a,c
	cp e
	jr c,l50ac
	ld a,e
.l50ac
	ld c,a
	ld a,b
	add #07
	push de
	call l5755
	ld de,#003b
	and a
	sbc hl,de
	pop de
	djnz l509b
	ld hl,l5672
	dec (hl)
	ld ix,l5549
	xor a
.l50c6
	ld (l5679),a
	ld a,(ix+#07)
	or a
	jp nz,l537e
.l50d0
	ld (ix+#00),#00
	ld a,(ix+#08)
	ld (ix+#07),a
.l50da
	ld l,(ix+#03)
	ld h,(ix+#04)
	ld a,(hl)
	cp #ff
	jr nz,l5147
	ld l,(ix+#01)
	ld h,(ix+#02)
.l50eb
	ld a,(hl)
	cp #ff
	jr nz,l5126
	ld l,(ix+#05)
	ld h,(ix+#06)
	ld (ix+#01),l
	ld (ix+#02),h
	ld a,(l5541)
	or a
	jr nz,l50eb
	push hl
	push bc
	push de
	ld a,(l5679)
	ld c,a
	ld b,#00
	ld hl,l553e
	add hl,bc
	push hl
	ld e,(hl)
	add a
	ld c,a
	ld hl,l57cd
	add hl,bc
	ld c,(hl)
	inc hl
	ld b,(hl)
	push bc
	pop hl
	ld (hl),e
	pop hl
	xor a
	ld (hl),a
	pop de
	pop bc
	pop hl
	jp l50eb
.l5126
	inc hl
	ld (ix+#01),l
	ld (ix+#02),h
	add a
	ld hl,(l5673)
	ld c,a
	ld b,#00
	add hl,bc
	ld c,(hl)
	inc hl
	ld b,(hl)
	push bc
	pop hl
	ld bc,l57c5
	add hl,bc
	ld (ix+#03),l
	ld (ix+#04),h
	jp l50da
.l5147
	bit 7,a
	jr nz,l51b1
	ld hl,l5681
	or a
	jr z,l5154
	add (ix+#20)
.l5154
	add a
	ld c,a
	ld b,#00
	add hl,bc
	ld e,(hl)
	ld (ix+#36),e
	ld (ix+#38),e
	inc hl
	ld e,(hl)
	ld (ix+#37),e
	ld (ix+#39),e
	ld (ix+#0a),#00
	ld (ix+#21),#00
	ld (ix+#1f),#00
	push ix
	pop hl
	ld bc,#000b
	add hl,bc
	ex de,hl
	ld a,(l5679)
	inc a
	ld hl,l55e6
	ld bc,#0014
.l5186
	add hl,bc
	dec a
	jr nz,l5186
	ldir
	push ix
	pop hl
	ld bc,#0022
	add hl,bc
	ex de,hl
	ld a,(l5679)
	inc a
	ld hl,l5622
	ld bc,#0014
.l519e
	add hl,bc
	dec a
	jr nz,l519e
	ldir
	ld a,(ix+#3a)
	ld (ix+#09),a
	ld (ix+#00),#ff
	jp l536a
.l51b1
	bit 6,a
	jr nz,l5208
	bit 5,a
	jp z,l51f5
	push af
	xor a
	ld (l567b),a
	pop af
.l51c0
	and #1f
	ld b,a
	jr z,l51da
	ld a,(l553b)
	push hl
	ld hl,l553d
	and (hl)
	ld (l553b),a
	pop hl
	ld c,a
	ld a,#07
	call l5755
	jp l51ec
.l51da
	ld a,(l553b)
	push hl
	ld hl,l553c
	or (hl)
	ld (l553b),a
	pop hl
	ld c,a
	ld a,#07
	call l5755
.l51ec
	ld c,b
	ld a,#06
	call l5755
	jp l536a
.l51f5
	and #1f
	ld hl,l5749
	ld c,a
	ld b,#00
	add hl,bc
	ld a,(hl)
	ld (ix+#07),a
	ld (ix+#08),a
	jp l536a
.l5208
	bit 5,a
	jr nz,l5275
	and #1f
	add a
	add a
	add a
	ld hl,(l5675)
	ld c,a
	ld b,#00
	add hl,bc
	ex de,hl
	push ix
	pop hl
	ld bc,#000b
	add hl,bc
	ld (ix+#0a),b
.l5223
	ld a,(de)
	bit 7,a
	jr nz,l5235
	ld (hl),#00
	inc hl
	ld (hl),a
	inc hl
	inc hl
	inc hl
	inc de
	ld a,(de)
	ld (hl),a
	jp l524d
.l5235
	ld (hl),#ff
	and #7f
	inc hl
	ld (hl),a
	inc hl
	ld (hl),a
	inc de
	ld a,(de)
	ld b,#ff
	bit 7,a
	jr nz,l5247
	ld b,#01
.l5247
	and #7f
	inc hl
	ld (hl),a
	inc hl
	ld (hl),b
.l524d
	inc de
	inc hl
	inc (ix+#0a)
	ld a,#04
	cp (ix+#0a)
	jr nz,l5223
	ld (ix+#0a),#00
	ld bc,#0014
	or a
	sbc hl,bc
	ex de,hl
	ld hl,l55e6
	ld a,(l5679)
	inc a
.l526b
	add hl,bc
	dec a
	jr nz,l526b
	ex de,hl
	ldir
	jp l536a
.l5275
	inc hl
	ld (ix+#03),l
	ld (ix+#04),h
	push hl
	ld hl,l528c
	and #1f
	add a
	ld c,a
	ld b,#00
	add hl,bc
	ld a,(hl)
	inc hl
	ld h,(hl)
	ld l,a
	jp (hl)
.l528c
	sub h
	ld d,d
	call pe,#e852
	ld d,d
	sbc h
	ld d,d
	pop hl
	ld a,(hl)
	ld (ix+#20),a
	jp l536a
	pop hl
	ld a,(hl)
	ld (l567b),a
	and #3f
	ld (l567d),a
	inc hl
	ld (ix+#03),l
	ld (ix+#04),h
	ld a,(hl)
	and #3f
	ld (l567e),a
	ld a,(l567b)
	and #c0
	rlca
	rlca
	rlca
	rlca
	ld (l567b),a
	ld a,(hl)
	rlca
	rlca
	and #03
	ld hl,l567b
	or (hl)
	ld (l567b),a
	ld (l567c),a
	ld a,(l567d)
	ld (l5680),a
	ld hl,l567e
	ld b,#ff
	cp (hl)
	jr nc,l52de
	ld b,#01
.l52de
	ld a,b
	ld (l567f),a
	ld a,(l5680)
	jp l51c0
	ld a,#02
	jr l52ee
	ld a,#01
.l52ee
	ld (ix+#09),a
	pop hl
	ld a,(hl)
	or a
	jr z,l535f
	add a
	add a
	add a
	ld hl,(l5677)
	ld c,a
	ld b,#00
	add hl,bc
	ex de,hl
	push ix
	pop hl
	ld bc,#0022
	add hl,bc
	ld (ix+#21),#00
.l530c
	ld a,(de)
	bit 7,a
	jr nz,l5320
	ld (hl),#00
	inc hl
	ld (hl),a
	inc hl
	inc hl
	inc hl
	inc de
	ld a,(de)
	neg
	ld (hl),a
	jp l5338
.l5320
	ld (hl),#ff
	and #7f
	inc hl
	ld (hl),a
	inc hl
	ld (hl),a
	inc de
	ld a,(de)
	ld b,#01
	bit 7,a
	jr nz,l5332
	ld b,#ff
.l5332
	and #7f
	inc hl
	ld (hl),a
	inc hl
	ld (hl),b
.l5338
	inc de
	inc hl
	inc (ix+#21)
	ld a,#04
	cp (ix+#21)
	jr nz,l530c
	ld (ix+#21),#00
	ld bc,#0014
	or a
	sbc hl,bc
	ex de,hl
	ld hl,l5622
	ld a,(l5679)
	inc a
.l5356
	add hl,bc
	dec a
	jr nz,l5356
	ex de,hl
	ldir
	jr l5364
.l535f
	ld a,#00
	ld (ix+#09),a
.l5364
	ld a,(ix+#09)
	ld (ix+#3a),a
.l536a
	ld l,(ix+#03)
	ld h,(ix+#04)
	inc hl
	ld (ix+#03),l
	ld (ix+#04),h
	ld a,(ix+#00)
	or a
	jp z,l50d0
.l537e
	ld a,(l5672)
	or a
	jr nz,l5387
	dec (ix+#07)
.l5387
	ld a,(ix+#0a)
	cp #04
	jp z,l53d1
	push ix
	pop hl
	ld b,a
	add a
	add a
	add b
	add #0b
	ld c,a
	ld b,#00
	add hl,bc
	ld a,(hl)
	inc hl
	or a
	jr nz,l53b4
	dec (hl)
	jr nz,l53a7
	inc (ix+#0a)
.l53a7
	inc hl
	inc hl
	inc hl
	ld a,(ix+#1f)
	add (hl)
	ld (ix+#1f),a
	jp l53d1
.l53b4
	dec (hl)
	jr nz,l53c9
	inc hl
	ld a,(hl)
	dec hl
	ld (hl),a
	inc hl
	inc hl
	inc hl
	ld a,(ix+#1f)
	add (hl)
	ld (ix+#1f),a
	dec hl
	jp l53cb
.l53c9
	inc hl
	inc hl
.l53cb
	dec (hl)
	jr nz,l53d1
	inc (ix+#0a)
.l53d1
	ld a,(ix+#09)
	or a
	jp z,l546e
	push ix
	pop hl
	ld a,(ix+#21)
	ld b,a
	add a
	add a
	add b
	add #22
	ld c,a
	ld b,#00
	add hl,bc
	ld a,(hl)
	inc hl
	or a
	jr nz,l540f
	dec (hl)
	jr nz,l53f3
	inc (ix+#21)
.l53f3
	inc hl
	inc hl
	inc hl
	ld c,(hl)
	ld b,#ff
	bit 7,c
	jr nz,l53ff
	ld b,#00
.l53ff
	ld l,(ix+#36)
	ld h,(ix+#37)
	add hl,bc
	ld (ix+#36),l
	ld (ix+#37),h
	jp l543d
.l540f
	dec (hl)
	jr nz,l5435
	inc hl
	ld a,(hl)
	dec hl
	ld (hl),a
	inc hl
	inc hl
	inc hl
	push hl
	ld c,(hl)
	ld b,#ff
	bit 7,c
	jr nz,l5423
	ld b,#00
.l5423
	ld l,(ix+#36)
	ld h,(ix+#37)
	add hl,bc
	ld (ix+#36),l
	ld (ix+#37),h
	pop hl
	dec hl
	jp l5437
.l5435
	inc hl
	inc hl
.l5437
	dec (hl)
	jr nz,l543d
	inc (ix+#21)
.l543d
	ld a,(ix+#21)
	cp #04
	jr nz,l546e
	ld a,(ix+#09)
	cp #02
	jr nz,l5452
	ld a,#00
	ld (ix+#09),a
	jr l546e
.l5452
	ld (ix+#21),#01
	push ix
	pop hl
	ld bc,#0022
	add hl,bc
	ex de,hl
	ld a,(l5679)
	inc a
	ld hl,l5622
	ld bc,#0014
.l5468
	add hl,bc
	dec a
	jr nz,l5468
	ldir
.l546e
	ld c,(ix+#36)
	ld a,(l5679)
	add a
	call l5755
	ld c,(ix+#37)
	inc a
	call l5755
	ld bc,#003b
	add ix,bc
	ld a,(l553c)
	rlc a
	ld (l553c),a
	cpl
	ld (l553d),a
	ld a,(l5679)
	inc a
	cp #03
	jp nz,l50c6
	ld a,(l567b)
	or a
	jr z,l54d0
	dec a
	ld (l567b),a
	or a
	jr nz,l54d0
	ld a,(l567c)
	ld (l567b),a
	ld a,(l5680)
	ld hl,l567f
	add (hl)
	ld (l5680),a
	ld c,a
	ld hl,l567d
	cp (hl)
	jr z,l54c3
	ld hl,l567e
	cp (hl)
	jr nz,l54cb
.l54c3
	ld a,(l567f)
	xor #fe
	ld (l567f),a
.l54cb
	ld a,#06
	call l5755
.l54d0
	ld a,(l5672)
	or a
	jr nz,l54dc
	ld a,(l57c6)
	ld (l5672),a
.l54dc
	ld a,#ff
	ld (l553a),a
	ret
;
.stop_music	; ? not tested
;
	push hl
	push de
	push bc
	push af
	xor a
	ld (l553a),a
	ld a,e
	ld (l553e),a
	ld a,b
	ld (l553f),a
	ld a,c
	ld (l5540),a
	ld hl,l5543
	ld de,l5549
	ldi
	ldi
	ldi
	ldi
	ldi
	ld hl,l5543
	ld de,l5584
	ldi
	ldi
	ldi
	ldi
	ldi
	ld hl,l5543
	ld de,l55bf
	ldi
	ldi
	ldi
	ldi
	ldi
	xor a
	ld (l5550),a
	ld (l558b),a
	ld (l55c6),a
	ld a,#ff
	ld (l553a),a
	pop af
	pop bc
	pop de
	pop hl
	ret
.l5541 equ $ + 7
.l5540 equ $ + 6
.l553f equ $ + 5
.l553e equ $ + 4
.l553d equ $ + 3
.l553c equ $ + 2
.l553b equ $ + 1
.music_end
.l553a
	db #ff,#38,#00,#00,#00,#00,#00,#ff
.l5543 equ $ + 1
.l5542
	db #ff,#00,#48,#55,#48,#55,#ff
.l5550 equ $ + 7
.l554e equ $ + 5
.l554a equ $ + 1
.l5549
	db #00,#48,#55,#48,#55,#07,#58,#00
	db #00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
.l558b equ $ + 7
.l5589 equ $ + 5
.l5584
	db #00,#48,#55,#48,#55,#16,#58,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
.l55bf equ $ + 3
	db #00,#00,#00,#00,#48,#55,#48,#55
.l55c6 equ $ + 2
.l55c4
	db #25,#58,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00
.l55de
	db #00,#00,#00,#00,#00,#00,#00,#00
.l55e6
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00
.l5622
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
.l5672
	db #02
.l5673
	db #d1
.l567b equ $ + 7
.l567a equ $ + 6
.l5679 equ $ + 5
.l5677 equ $ + 3
.l5675 equ $ + 1
	db #57,#47,#5c,#47,#5d,#04,#0f,#55
.l5680 equ $ + 4
.l567f equ $ + 3
.l567e equ $ + 2
.l567d equ $ + 1
.l567c
	db #75,#75,#20,#08,#75
.l5681
	dw #0000,#0c9c,#0be7,#0b3c
	dw #0a9b,#0a02,#0973,#08eb
	dw #086b,#07f2,#0780,#0714
	dw #06ae,#064e,#05f4,#059e
	dw #054d,#0501,#0469,#0475
	dw #0435,#03f9,#03c0,#038a
	dw #0357,#0327,#02fa,#02cf
	dw #02a7,#0281,#025d,#023b
	dw #021b,#01fc,#01e0,#01c5
	dw #01ac,#0194,#017d,#0168
	dw #0153,#0140,#012e,#011d
	dw #010d,#00fe,#00f0,#00e2
	dw #00d6,#00ca,#00be,#00b4
	dw #00aa,#00a0,#0097,#008f
	dw #0087,#007f,#0078,#0071
	dw #006b,#0065,#005f,#005a
	dw #0055,#0050,#004c,#0047
	dw #0043,#0040,#003c,#0039
	dw #0035,#0032,#0030,#002d
	dw #002a,#0028,#0026,#0024
	dw #0022,#0020,#001e,#001c
	dw #001b,#0019,#0018,#0016
	dw #0015,#0014,#0013,#0012
	dw #0011,#0010,#000f,#000e
	dw #000d,#000c,#000b,#000a
.l5749
	db #02,#03,#04,#06,#08,#0c,#10,#18
	db #20,#30,#40,#60
.l5755
	push af
	push bc
	ld b,#f4
	out (c),a
	ld b,#f6
	in a,(c)
	or #c0
	out (c),a
	and #3f
	out (c),a
	ld b,#f4
	out (c),c
	ld b,#f6
	ld c,a
	or #80
	out (c),a
	out (c),c
	pop bc
	pop af
	ret
	di
	ld de,l57be		; set ! test player
	ld hl,#0038
	ld bc,#0004
	ldir
	ld hl,#0039
	ld de,l579c
	ld (hl),e
	inc hl
	ld (hl),d
	ei
	ret
	di			; reset
	ld hl,l57be
	ld de,#0038
	ld bc,#0004
	ldir
	ei
	ret
.l579c				; test player
	push af
	push bc
	push de
	push hl
	push ix
	push iy
	ld a,(l57c4)
	cp #06
	jr nz,l57b2
	call l507f
	xor a
	ld (l57c4),a
.l57b2
	inc a
	ld (l57c4),a
	pop iy
	pop ix
	pop hl
	pop de
	pop bc
	pop af
.l57be
	jp #b941
	ret
.l57c9 equ $ + 7
.l57c7 equ $ + 5
.l57c6 equ $ + 4
.l57c5 equ $ + 3
.l57c4 equ $ + 2
	db #00,#c9,#00,#00,#02,#82,#04,#82
.l57d1 equ $ + 7
.l57cf equ $ + 5
.l57cd equ $ + 3
.l57cb equ $ + 1
	db #05,#42,#00,#51,#00,#60,#00,#79
	db #00,#99,#00,#da,#00,#e1,#00,#17
	db #01,#46,#01,#56,#01,#61,#01,#81
	db #01,#97,#01,#c7,#01,#e4,#01,#eb
	db #01,#08,#02,#28,#02,#2f,#02,#4f
	db #02,#81,#02,#b3,#02,#e2,#02,#14
	db #03,#47,#03,#7a,#03,#a2,#03,#da
	db #03,#12,#04,#4a,#04,#02,#00,#01
	db #04,#01,#03,#05,#06,#07,#08,#09
	db #0a,#09,#0c,#ff,#0e,#0d,#0d,#0d
	db #0d,#0f,#10,#11,#13,#12,#0d,#0d
	db #0d,#0f,#ff,#14,#16,#14,#15,#14
	db #15,#14,#15,#14,#15,#14,#16,#17
	db #18,#19,#1a,#14,#15,#14,#15,#14
	db #15,#14,#16,#ff,#e0,#00,#a0,#d1
	db #e2,#05,#84,#24,#24,#82,#1c,#1f
	db #84,#22,#22,#82,#21,#1f,#84,#29
	db #29,#82,#21,#24,#84,#27,#82,#26
	db #27,#26,#24,#ff,#e0,#00,#a0,#c1
	db #e1,#0a,#80,#3b,#d1,#e2,#05,#83
	db #3c,#84,#3c,#82,#3c,#37,#c1,#e1
	db #0a,#80,#39,#d1,#e2,#05,#3a,#c1
	db #85,#3a,#c0,#84,#00,#82,#00,#d1
	db #35,#39,#3c,#84,#3f,#c1,#e1,#0a
	db #80,#3e,#d1,#e2,#05,#83,#3f,#c1
	db #e1,#0a,#80,#3e,#d1,#e2,#05,#83
	db #3f,#82,#3e,#3c,#ff,#e0,#00,#a0
	db #c0,#8b,#30,#ff,#e0,#00,#a0,#c1
	db #e1,#0a,#80,#3f,#d1,#e2,#05,#83
	db #40,#84,#40,#82,#41,#43,#86,#3c
	db #82,#40,#43,#c1,#e1,#0a,#80,#44
	db #d1,#e2,#05,#83,#45,#82,#43,#45
	db #43,#41,#c1,#e1,#0a,#80,#43,#d1
	db #e2,#05,#83,#44,#82,#43,#44,#43
	db #41,#ff,#e0,#00,#a0,#c1,#e1,#0a
	db #80,#3f,#d1,#e2,#05,#83,#40,#84
	db #40,#82,#41,#43,#85,#3c,#84,#3a
	db #82,#3c,#c1,#e1,#0a,#80,#38,#d1
	db #e2,#05,#83,#39,#c1,#86,#35,#c0
	db #82,#35,#c1,#35,#37,#39,#41,#3e
	db #ff,#e0,#fe,#a0,#c1,#e1,#0a,#82
	db #3c,#e1,#05,#85,#3e,#c0,#88,#3e
	db #ff,#e0,#00,#e3,#01,#42,#c8,#e1
	db #0b,#89,#30,#ff,#e0,#00,#a0,#c1
	db #e1,#0a,#80,#26,#2d,#32,#27,#2e
	db #33,#28,#2f,#34,#29,#30,#35,#2a
	db #31,#36,#2b,#32,#37,#2c,#33,#38
	db #2d,#34,#39,#ff,#e0,#02,#a0,#d1
	db #e2,#05,#84,#29,#82,#35,#84,#29
	db #82,#35,#84,#29,#82,#2b,#2c,#84
	db #2d,#ff,#e0,#00,#a0,#d1,#e2,#05
	db #86,#30,#c1,#82,#32,#33,#d1,#85
	db #34,#84,#37,#82,#3c,#c1,#e1,#0a
	db #80,#38,#d1,#e2,#05,#83,#39,#86
	db #35,#c0,#82,#35,#c1,#e1,#0a,#40
	db #d1,#e2,#05,#41,#c1,#41,#d1,#43
	db #40,#ff,#e0,#00,#a0,#c1,#e1,#05
	db #82,#3e,#41,#40,#84,#3c,#d1,#3a
	db #c1,#82,#3e,#d1,#3c,#c1,#40,#3a
	db #3c,#cd,#e1,#04,#89,#39,#ff,#e0
	db #00,#a0,#c0,#86,#30,#ff,#e0,#00
	db #a0,#c1,#e1,#05,#82,#3e,#41,#40
	db #84,#3c,#d1,#3a,#c1,#82,#3e,#d1
	db #3c,#c1,#40,#3a,#40,#cd,#e1,#04
	db #89,#41,#ff,#e0,#00,#a0,#c1,#e1
	db #0a,#84,#18,#18,#82,#1c,#1f,#84
	db #22,#22,#82,#21,#1f,#84,#1d,#1d
	db #82,#21,#24,#84,#27,#82,#26,#27
	db #26,#24,#ff,#e0,#00,#a0,#c0,#8b
	db #30,#ff,#e0,#00,#a0,#c1,#e1,#0a
	db #84,#18,#18,#82,#1c,#1f,#84,#22
	db #22,#82,#21,#1f,#84,#1d,#1d,#82
	db #21,#24,#84,#29,#82,#2b,#2c,#2b
	db #29,#ff,#e0,#f2,#a0,#c1,#e1,#0a
	db #82,#26,#d1,#e2,#05,#26,#c1,#e1
	db #0a,#26,#d6,#e1,#03,#26,#d2,#e2
	db #01,#26,#d1,#e2,#05,#26,#c1,#26
	db #e1,#0a,#26,#d6,#e1,#03,#26,#d1
	db #e2,#05,#26,#d2,#e2,#01,#26,#c1
	db #e1,#05,#26,#ff,#e0,#f4,#a0,#c1
	db #e1,#0a,#82,#26,#d1,#e2,#05,#26
	db #c1,#e1,#0a,#26,#d6,#e1,#03,#26
	db #d2,#e2,#01,#26,#d1,#e2,#05,#26
	db #c1,#26,#e1,#0a,#26,#d6,#e1,#03
	db #26,#d1,#e2,#05,#26,#d2,#e2,#01
	db #26,#c1,#e1,#05,#26,#ff,#e0,#f9
	db #a0,#c1,#e1,#0a,#82,#26,#d1,#e2
	db #05,#26,#c1,#e1,#0a,#26,#d6,#e1
	db #03,#26,#d2,#e2,#01,#26,#d1,#e2
	db #05,#26,#c1,#26,#e1,#0a,#26,#d6
	db #e1,#03,#26,#d1,#e2,#05,#26,#d2
	db #e2,#01,#84,#26,#ff,#e0,#f7,#a0
	db #c1,#e1,#0a,#82,#26,#d1,#e2,#05
	db #26,#c1,#e1,#0a,#26,#d6,#e1,#03
	db #26,#d2,#e2,#01,#26,#d1,#e2,#05
	db #26,#c1,#26,#e1,#0a,#26,#d6,#e1
	db #03,#26,#d1,#e2,#05,#26,#d2,#e2
	db #01,#26,#c1,#e1,#0a,#26,#ff,#e0
	db #00,#a0,#d1,#e2,#05,#82,#18,#a1
	db #cf,#e2,#00,#00,#a0,#d1,#e2,#05
	db #18,#a1,#cf,#e2,#00,#00,#a2,#d0
	db #00,#a1,#cf,#00,#a5,#d1,#e1,#02
	db #84,#2c,#a2,#d0,#e2,#00,#82,#00
	db #a1,#cf,#00,#a2,#d0,#00,#a1,#ce
	db #00,#ff,#e0,#00,#a0,#d1,#e2,#05
	db #82,#1d,#a1,#cf,#e2,#00,#00,#a0
	db #d1,#e2,#05,#1d,#a1,#cf,#e2,#00
	db #00,#a2,#d0,#00,#a1,#cf,#00,#a5
	db #d1,#e1,#02,#84,#2c,#a2,#d0,#e2
	db #00,#82,#00,#a1,#cf,#00,#a2,#d0
	db #00,#a1,#ce,#00,#ff,#e0,#00,#a0
	db #d1,#e2,#05,#82,#1d,#a1,#cf,#e2
	db #00,#00,#a0,#d1,#e2,#05,#1d,#a1
	db #cf,#e2,#00,#00,#a2,#d0,#00,#a1
	db #cf,#00,#a5,#d1,#e1,#02,#84,#2c
	db #29,#82,#27,#24,#ff,#e0,#00,#a0
	db #d1,#e2,#05,#82,#18,#a1,#cf,#e2
	db #00,#00,#a2,#d0,#00,#a1,#ce,#00
	db #a5,#d1,#e1,#02,#2c,#a1,#cf,#e2
	db #00,#00,#a5,#d1,#e1,#02,#2c,#a2
	db #d0,#e2,#00,#00,#a5,#d1,#e1,#02
	db #2c,#a1,#ce,#e2,#00,#00,#a5,#d1
	db #e1,#02,#2a,#28,#ff,#e0,#00,#a0
	db #d1,#e2,#05,#82,#1a,#a1,#cf,#e2
	db #00,#00,#a2,#d0,#00,#a1,#ce,#00
	db #a5,#d1,#e1,#02,#2c,#a1,#cf,#e2
	db #00,#00,#a5,#d1,#e1,#02,#2c,#a2
	db #d0,#e2,#00,#00,#a5,#d1,#e1,#02
	db #2c,#a1,#ce,#e2,#00,#00,#a5,#d1
	db #e1,#02,#2a,#28,#ff,#e0,#00,#a0
	db #d1,#e2,#05,#82,#1d,#a1,#cf,#e2
	db #00,#00,#a2,#d0,#00,#a1,#ce,#00
	db #a5,#d1,#e1,#02,#2c,#a1,#cf,#e2
	db #00,#00,#a5,#d1,#e1,#02,#2c,#a2
	db #d0,#e2,#00,#00,#a5,#d1,#e1,#02
	db #2c,#a1,#ce,#e2,#00,#00,#a5,#d1
	db #e1,#02,#2a,#28,#ff,#e0,#00,#a0
	db #d1,#e2,#05,#82,#1f,#a1,#cf,#e2
	db #00,#00,#a2,#d0,#00,#a1,#ce,#00
	db #a5,#d1,#e1,#02,#2c,#a1,#cf,#e2
	db #00,#00,#a5,#d1,#e1,#02,#2c,#a2
	db #d0,#e2,#00,#00,#a5,#d1,#e1,#02
	db #2c,#a1,#ce,#e2,#00,#00,#a5,#d1
	db #e1,#02,#84,#2a,#ff,#0f,#00,#0f
	db #00,#0f,#00,#0f,#00,#01,#0d,#83
	db #a7,#01,#00,#01,#00,#01,#0d,#83
	db #a7,#01,#00,#01,#00,#01,#0b,#83
	db #a1,#01,#00,#01,#00,#01,#09,#83
	db #9b,#01,#00,#01,#00,#01,#07,#83
	db #95,#01,#00,#01,#00,#01,#0a,#9e
	db #3c,#09,#00,#01,#00,#01,#0c,#01
	db #00,#03,#00,#01,#00,#0f,#01,#97
	db #97,#83,#aa,#01,#00,#01,#0e,#01
	db #00,#03,#00,#01,#00,#01,#0e,#01
	db #00,#03,#00,#87,#e2,#01,#0e,#01
	db #00,#82,#9c,#62,#00,#01,#0f,#07
	db #00,#84,#bc,#01,#00,#01,#0f,#04
	db #ff,#08,#00,#84,#ac,#01,#0b,#02
	db #00,#01,#f5,#01,#00,#01,#0d,#02
	db #00,#01,#f3,#01,#00,#01,#0f,#02
	db #00,#01,#f1,#01,#00,#01,#0f,#0f
	db #ff,#01,#00,#01,#00,#01,#0d,#0d
	db #ff,#01,#00,#01,#00,#01,#0b,#0b
	db #ff,#01,#00,#01,#00,#01,#09,#09
	db #ff,#01,#00,#01,#00,#01,#0e,#01
	db #00,#01,#f2,#01,#00,#01,#0c,#91
	db #e3,#a1,#63,#a1,#63,#82,#14,#0c
	db #00,#01,#00,#82,#94,#01,#0d,#04
	db #ff,#08,#00,#8a,#d3,#01,#0b,#04
	db #ff,#08,#00,#8c,#d3,#01,#09,#04
	db #ff,#08,#00,#95,#d3,#01,#0c,#04
	db #00,#83,#a4,#53,#00,#01,#0d,#03
	db #00,#08,#ff,#05,#00,#01,#0f,#09
	db #ff,#09,#01,#0f,#ff,#01,#0f,#02
	db #00,#0c,#ff,#0c,#01,#01,#0d,#0c
	db #ff,#0d,#01,#0e,#ff,#01,#00,#01
	db #00,#01,#00,#01,#00,#01,#02,#84
	db #08,#82,#88,#84,#08,#01,#00,#01
	db #3c,#03,#ec,#01,#ef,#86,#86,#01
	db #f1,#01,#2b,#01,#e5,#88,#08,#82
	db #04,#04,#fe,#03,#02,#08,#00,#84
	db #08,#82,#88,#84,#08,#85,#0a,#03
	db #fd,#85,#0a,#01,#05,#01,#00,#01
	db #63,#03,#e2,#01,#d1,#01,#04,#01
	db #38,#03,#ec,#01,#f1,#03,#00,#04
	db #02,#04,#fc,#01,#05,#82,#04,#04
	db #02,#04,#fc,#04,#02,#01,#00,#01
	db #01,#01,#01,#01,#01,#01,#00,#01
	db #63,#02,#d8,#01,#d1,#06,#00,#01
	db #ff,#01,#00,#01,#01,#10,#00,#01
	db #05,#01,#05,#01,#05,#08,#00,#01
	db #01,#01,#01,#01,#01,#01,#00,#01
	db #00,#01,#01,#01,#ff,#01,#00,#01
	db #63,#02,#d8,#01,#d1,#06,#00,#01
	db #ff,#01,#00,#01,#01,#08,#00,#01
	db #01,#01,#fe,#01,#01,#08,#00,#01
	db #01,#01,#01,#01,#01,#01,#00,#01
	db #00,#01,#01,#01,#ff,#01,#00,#01
	db #63,#02,#d8,#01,#d1,#06,#00,#01
	db #ff,#01,#00,#01,#01,#08,#00,#01
	db #01,#01,#fe,#01,#01,#08,#00,#01
	db #01,#01,#01,#01,#01,#01,#00,#01
	db #00,#01,#01,#01,#ff,#01,#00,#01
	db #63,#02,#d8,#01,#d1,#06,#00,#01
	db #ff,#01,#00,#01,#01,#08,#00,#01
	db #01,#01,#fe,#01,#01,#08,#00,#01
	db #01,#01,#01,#01,#01,#01,#00,#01
	db #00,#01,#01,#01,#ff,#1e,#00,#3a
	db #03,#3a,#04,#0e,#00,#14,#00,#19
	db #00,#00,#01,#02,#03,#25,#ff,#27
	db #28,#29,#2a,#ff,#38,#38,#3a,#39
	db #ff,#98,#00,#a1,#00,#aa,#00,#b3
	db #00,#bc,#00,#c5,#00,#ce,#00,#d7
	db #00,#e0,#00,#e9,#00,#f2,#00,#fb
	db #00,#04,#01,#0d,#01,#16,#01,#1f
	db #01,#28,#01,#31,#01,#3a,#01,#43
	db #01,#4c,#01,#55,#01,#5e,#01,#67
	db #01,#70,#01,#79,#01,#82,#01,#8b
	db #01,#9b,#01,#a6,#01,#ce,#01,#f3
	db #01,#05,#02,#1e,#02,#29,#02,#34
	db #02,#43,#02,#52,#02,#63,#02,#6f
	db #02,#78,#02,#81,#02,#8a,#02,#93
	db #02,#9c,#02,#a5,#02,#ae,#02,#b7
	db #02,#c0,#02,#97,#32,#d6,#be

;xor a
;ld (#567a),a	; init
;call &5004
;call #507f	; play

.game_name
	db "Shufflepuck Cafe",0
.game_year
	db "1989",0
.game_publisher
	db "Broderbund Software",0
.music_author
	db "",0
.music_comment
	db "",0

	read "music_end_v1_0.asm"
